home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
v7n20.arc
/
BAT_CASE.BAT
next >
Wrap
DOS Batch File
|
1988-10-29
|
601b
|
36 lines
ECHO OFF
CLS
:CASE0
ECHO WHAT would you like to do now?
ECHO (S) Run Spreadsheet
ECHO (D) Run Database
ECHO (W) Run Word Processor
ECHO (Q) Quit
GETKEY
SET opt=0
REM 68=D, 81=Q, 83=S, 87=W, 100=d, 113=q, 115=s, 119=w
FOR %%e IN (68 81 83 87 100 113 115 119) DO IF ERRORLEVEL=%%e SET opt=%%e
GOTO CASE%opt%
:CASE115
:CASE83
ECHO Pretending to run Spreadsheet
PAUSE
GOTO CASE0
:CASE68
:CASE100
ECHO Pretending to run Database
PAUSE
GOTO CASE0
:CASE119
:CASE87
ECHO Pretending to run Word Processor
Pause
GOTO CASE0
:CASE113
:CASE81
ECHO ENDING it all